﻿Partial Public Class About
    Inherits Page

    Public Sub New()
        InitializeComponent()
    End Sub

    'Executes when the user navigates to this page.
    Protected Overrides Sub OnNavigatedTo(ByVal e As System.Windows.Navigation.NavigationEventArgs)



    End Sub

    Private Sub About_Loaded(ByVal sender As Object, ByVal e As System.Windows.RoutedEventArgs) Handles Me.Loaded
        Dim proxy As New ContentService.ContentServiceSoapClient

        AddHandler proxy.GetContentCompleted, AddressOf GetContentCompleted

        proxy.GetContentAsync("About")

    End Sub

    Private Sub GetContentCompleted(ByVal sender As Object, ByVal e As ContentService.GetContentCompletedEventArgs)

        Me.ContentText.Text = e.Result

    End Sub
End Class